object SimpForm: TSimpForm Left = 384 Top = 185 Width = 782 Height = 258 HorzScrollBar.Range = 1200 VertScrollBar.Range = 2000 AutoScroll = False Caption = 'SimpForm' Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [] PixelsPerInch = 96 TextHeight = 16 object TitleBand: TQRBand Left = 0 Top = 0 Width = 1200 Height = 45 Align = alTop BandType = rbTitle Color = clWhite Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ForceNewPage = False Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False ParentFont = False Ruler = qrrInchesHV object QRLabel3: TQRLabel Left = 572 Top = 20 width = 167 height = 16 Caption = 'Copyright (c) 1996 QSD AS' AlignToBand = False Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold, fsItalic] ParentFont = False Transparent = True end object Image1: TImage Left = 12 Top = 4 Width = 69 Height = 33 Picture.Data = {} Stretch = True end object QRLabel1: TQRLabel Left = 96 Top = 4 width = 193 height = 36 Caption = 'QuickReport' AlignToBand = False Font.Color = 8404992 Font.Height = -32 Font.Name = 'Arial' Font.Style = [fsBold, fsItalic] ParentFont = False Transparent = True end object QRLabel2: TQRLabel Left = 300 Top = 20 width = 61 height = 16 Caption = 'for Delphi' AlignToBand = False Font.Color = 8404992 Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold, fsItalic] ParentFont = False end end object DetailBand: TQRBand Left = 0 Top = 65 Width = 1200 Height = 20 Align = alTop BandType = rbDetail Color = clWhite ForceNewPage = False Frame.DrawTop = False Frame.DrawBottom = True Frame.DrawLeft = False Frame.DrawRight = False Ruler = qrrNone object QRDBText1: TQRDBText Left = 12 Top = 0 width = 213 height = 17 DataSource = DataSource1 DataField = 'Company' end object QRDBText2: TQRDBText Left = 440 Top = 0 width = 117 height = 17 DataSource = DataSource1 DataField = 'Contact' end object QRDBText3: TQRDBText Left = 568 Top = 0 width = 85 height = 17 DataSource = DataSource1 DataField = 'Phone' end object QRDBText4: TQRDBText Left = 660 Top = 0 width = 85 height = 17 DataSource = DataSource1 DataField = 'FAX' end object QRDBText5: TQRDBText Left = 240 Top = 0 width = 90 height = 16 AutoSize = True DataSource = DataSource1 DataField = 'Addr1' Transparent = True end end object PageFooterBand: TQRBand Left = 0 Top = 85 Width = 1200 Height = 20 Align = alTop BandType = rbPageFooter Color = clWhite ForceNewPage = False Frame.Width = 0 Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Ruler = qrrNone object QRSysData1: TQRSysData Left = 640 Top = 0 width = 89 height = 17 Alignment = taRightJustify AlignToBand = True Data = qrsPageNumber Text = 'Page ' end end object QRBand1: TQRBand Left = 0 Top = 45 Width = 1200 Height = 20 Align = alTop BandType = rbColumnHeader Color = clWhite ForceNewPage = False Frame.DrawTop = False Frame.DrawBottom = True Frame.DrawLeft = False Frame.DrawRight = False Ruler = qrrNone object QRLabel4: TQRLabel Left = 12 Top = 1 width = 60 height = 16 Caption = 'Company' AlignToBand = False Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object QRLabel5: TQRLabel Left = 240 Top = 1 width = 50 height = 16 Caption = 'Address' AlignToBand = False Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object QRLabel6: TQRLabel Left = 440 Top = 1 width = 48 height = 16 Caption = 'Contact' AlignToBand = False Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object QRLabel7: TQRLabel Left = 568 Top = 1 width = 41 height = 16 Caption = 'Phone' AlignToBand = False Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object QRLabel8: TQRLabel Left = 660 Top = 1 width = 24 height = 16 Caption = 'Fax' AlignToBand = False Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end end object QRBand2: TQRBand Left = 0 Top = 105 Width = 1200 Height = 20 Align = alTop BandType = rbGroupFooter Color = clWhite ForceNewPage = False Frame.DrawTop = False Frame.DrawBottom = True Frame.DrawLeft = False Frame.DrawRight = False Ruler = qrrNone end object SimpRep: TQuickReport DataSource = DataSource1 ColumnMarginInches = 0 ColumnMarginMM = 0 Columns = 1 DisplayPrintDialog = False LeftMarginInches = 0 LeftMarginMM = 0 Orientation = poPortrait PageFrame.DrawTop = True PageFrame.DrawBottom = True PageFrame.DrawLeft = True PageFrame.DrawRight = True PaperLength = 0 PaperSize = qrpDefault PaperWidth = 0 PrintOrder = qrColByCol ReportTitle = 'QuickReport Simple report demonstration' RestartData = True SQLCompatible = False TitleBeforeHeader = False Left = 4 Top = 140 end object Table1: TTable Active = True DatabaseName = 'DBDEMOS' IndexName = 'ByCompany' TableName = 'CUSTOMER.DB' Left = 36 Top = 140 object Table1Company: TStringField FieldName = 'Company' Size = 30 end object Table1CustNo: TFloatField FieldName = 'CustNo' end object Table1Addr1: TStringField FieldName = 'Addr1' Size = 30 end object Table1Addr2: TStringField FieldName = 'Addr2' Size = 30 end object Table1City: TStringField FieldName = 'City' Size = 15 end object Table1State: TStringField FieldName = 'State' end object Table1Zip: TStringField FieldName = 'Zip' Size = 10 end object Table1Country: TStringField FieldName = 'Country' end object Table1Phone: TStringField FieldName = 'Phone' Size = 15 end object Table1FAX: TStringField FieldName = 'FAX' Size = 15 end object Table1TaxRate: TFloatField FieldName = 'TaxRate' end object Table1Contact: TStringField FieldName = 'Contact' end object Table1LastInvoiceDate: TDateTimeField FieldName = 'LastInvoiceDate' end end object DataSource1: TDataSource DataSet = Table1 Left = 68 Top = 140 end object QRGroup1: TQRGroup FooterBand = QRBand2 Level = 0 OnNeedData = QRGroup1NeedData Left = 16 Top = 172 end end